#include <iostream>
#include <string>
#include <sstream>
#include <vector>
#include <cctype>
#include <algorithm>

int main() {
    std::string inp;
    std::getline(std::cin, inp); 
    std::istringstream iss(inp);
    std::vector<std::string> lst;
    std::string token;
    while (iss >> token) {
        lst.push_back(token); 
    }

    int caplcount = 0;
    int latsymbcount = 0;
    int short_words_count = 0;
    int longest_length = 0;
    std::string longest_word = "";

    if (lst.size() > 1) {
        for (const auto& word : lst) {
            if (std::isupper(word[0])) {
                caplcount++;
            }
            if (std::any_of(word.begin(), word.end(), [](char ch) {
                return std::tolower(ch) >= 'a' && std::tolower(ch) <= 'z';
            })) {
                latsymbcount++;
            }
            if (word.length() <= 3) {
                short_words_count++;
            }
            if (word.length() > longest_word.length()) {
                longest_word = word;
                longest_length = word.length();
            }
        }

        int hyphen_words_count = std::count_if(lst.begin(), lst.end(), [](const std::string& s) {
            return s.find('-') != std::string::npos;
        });

        std::cout << "Кол-во слов с заглавной латинской буквы: " << caplcount << std::endl;
        std::cout << "Кол-во слов, содержащих латинский символ: " << latsymbcount << std::endl;
        std::cout << "Кол-во слов, не превышающих 3 символа: " << short_words_count << std::endl;
        std::cout << "Кол-во слов в составе которых есть дефис: " << hyphen_words_count << std::endl;
        std::cout << "Самое длинное слово: " << longest_word << std::endl;
        std::cout << "Длина самого длинного слова: " << longest_length << std::endl;
        std::cout << "Кол-во слов: " << lst.size() << std::endl;

    } else {
        std::cout << "Мало данных для анализа" << std::endl;
    }
}
